-- background: 2202 from stack: in.3r -- bmap block id: 12879 -- flags: 4000 -- background id: 0 -- name: Functions ----- HyperTalk script ----- on opencard put (the number of this card - the number of first card of this background+1) into field "PageNumber" set scroll of field description to 0 put "Functions" into field "type" end opencard -- part 2 (field) -- low flags: 00 -- high flags: 0007 -- rect: left=58 top=45 right=256 bottom=509 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 9 -- style flags: 0 -- line height: 12 -- part name: description -- part 3 (field) -- low flags: 01 -- high flags: 0004 -- rect: left=3 top=3 right=37 bottom=286 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 24 -- style flags: 0 -- line height: 32 -- part name: Name -- part 10 (field) -- low flags: 01 -- high flags: 0002 -- rect: left=460 top=15 right=32 bottom=488 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: PageNumber -- part 19 (field) -- low flags: 01 -- high flags: 0004 -- rect: left=283 top=3 right=37 bottom=436 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 65535 -- font id: 3 -- text size: 24 -- style flags: 0 -- line height: 32 -- part name: type -- part 27 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=47 right=90 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 11645 / 11645 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Return ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup visual effect iris close go first card end mouseUp -- part 28 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=88 right=131 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 14767 / 14767 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: About... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup visual iris open to gray visual iris close to black visual iris open to gray visual iris close go background information end mouseUp -- part 29 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=129 right=172 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 29114 / 29114 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Back ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup visual barn door close to black visual barn door open pop card end mouseUp -- part 30 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=170 right=213 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 1011 / 1011 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Home ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup visual dissolve to black visual dissolve go first card of home end mouseUp -- part 31 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=211 right=254 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 1000 / 1000 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Open Stack ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup put "Please select a stack to open..." domenu "open stack..." hide message end mouseUp -- part 32 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=252 right=295 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 17343 / 17343 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Launch Application ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup visual venetian blinds to gray visual venetian blinds to black visual venetian blinds to gray visual venetian blinds go to background "Mini Hyperstation" end mouseUp -- part 33 (button) -- low flags: 00 -- high flags: 2004 -- rect: left=3 top=293 right=336 bottom=50 -- title width / last selected line: 0 -- icon id / first selected line: 21786 / 21786 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Menus Off ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup if menubar("©1988SDrazga") then hide menubar else show menubar end mouseUp -- part 34 (button) -- low flags: 00 -- high flags: A004 -- rect: left=61 top=292 right=341 bottom=119 -- title width / last selected line: 0 -- icon id / first selected line: 2 / 2 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: XFCNs... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "XFCNs" end mouseUp -- part 35 (button) -- low flags: 00 -- high flags: A004 -- rect: left=124 top=292 right=341 bottom=182 -- title width / last selected line: 0 -- icon id / first selected line: 2 / 2 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: XCMDS... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "XCMDs" end mouseUp -- part 36 (button) -- low flags: 00 -- high flags: A004 -- rect: left=188 top=292 right=341 bottom=246 -- title width / last selected line: 0 -- icon id / first selected line: 29007 / 29007 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Functions... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "Functions" end mouseUp -- part 37 (button) -- low flags: 00 -- high flags: A004 -- rect: left=252 top=292 right=341 bottom=310 -- title width / last selected line: 0 -- icon id / first selected line: 1060 / 1060 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Scripts... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "Scripts" end mouseUp -- part 38 (button) -- low flags: 00 -- high flags: A004 -- rect: left=317 top=292 right=341 bottom=375 -- title width / last selected line: 0 -- icon id / first selected line: 27056 / 27056 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Buttons... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "Buttons" end mouseUp -- part 39 (button) -- low flags: 00 -- high flags: A004 -- rect: left=381 top=292 right=341 bottom=439 -- title width / last selected line: 0 -- icon id / first selected line: 22999 / 22999 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Quick Ref... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlButton "Quick Ref" end mouseUp -- part 40 (button) -- low flags: 00 -- high flags: A004 -- rect: left=446 top=292 right=341 bottom=504 -- title width / last selected line: 0 -- icon id / first selected line: 11645 / 11645 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Full Index... ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup controlbutton index end mouseUp -- part 41 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=488 top=11 right=33 bottom=510 -- title width / last selected line: 0 -- icon id / first selected line: 1013 / 1013 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Next ----- HyperTalk script ----- on mousestilldown global scrolling put true into scrolling goNext end mousestilldown on mouseup global scrolling if not scrolling then goNext put false into scrolling end mouseup -- part 42 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=437 top=11 right=33 bottom=459 -- title width / last selected line: 0 -- icon id / first selected line: 1014 / 1014 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Prev ----- HyperTalk script ----- on mousestilldown global scrolling put true into scrolling goPrev end mousestilldown on mouseup global scrolling if not scrolling then goPrev put false into scrolling end mouseup